home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / MLT / XTRACE311.sit / XTRACE311 / X-TRACE 3.1.1.rsrc / TEXT_702_roku_line.xti.txt < prev    next >
Text File  |  1996-09-01  |  347b  |  18 lines
  1. model    "Rokkaku line"
  2. {
  3.     para    roku.para.x,roku.para.y,roku.para.z;
  4.     leverz    roku.levr.x,roku.levr.y,roku.levr.z;
  5.     var        l2=roku.l/2;
  6.     boundary    oval    0,0,l2, 0,0,1, l2*sqrt (3),roku.r*sqrt (3)
  7.     {
  8.         sphere    0,0,roku.l, roku.r;
  9.         sphere    0,0,0, roku.r;
  10.         and
  11.         {
  12.             plane    0,0,0, 0,0,-1;
  13.             plane    0,0,roku.l, 0,0,1;
  14.             cylind    0,0,0, 0,0,1, roku.r;
  15.         }
  16.     }
  17. }
  18.